home *** CD-ROM | disk | FTP | other *** search
/ Linux Cubed Series 3: Developer Tools / Linux Cubed Series 3 - Developer Tools.iso / devel / lang / lisp / stk-3.002 / stk-3 / STk-3.1 / Contrib / STk-wtour / lessons / checkbutton.stk < prev    next >
Encoding:
Text File  |  1994-08-24  |  189 b   |  10 lines
  1. ;; A checkbutton widget
  2.  
  3. (checkbutton '.c1 :text "Select me" :anchor "w")
  4. (pack .c1 :fill "x")
  5.  
  6. ;; Shorter ...
  7. (pack 
  8.    (checkbutton '.c2 :text "Select me too" :anchor "w") 
  9.    :fill "x")
  10.